home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / demos / a6 / a6.dir / 00021_VOL DOWN toggle.ls < prev    next >
Encoding:
Text File  |  1996-08-19  |  335 b   |  15 lines
  1. on mouseDown
  2.   puppetSprite(35, 1)
  3.   set the memberNum of sprite 35 to the number of member "VOL DOWN ON"
  4.   updateStage()
  5. end
  6.  
  7. on mouseUp
  8.   set the memberNum of sprite 35 to the number of member "VOL DOWN OFF"
  9.   if the soundLevel > 0 then
  10.     set the soundLevel to the soundLevel - 1
  11.   end if
  12.   updateStage()
  13.   puppetSprite(35, 0)
  14. end
  15.